home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-09 / marks1.zip / MARKS.BAT < prev    next >
DOS Batch File  |  1992-03-15  |  488b  |  32 lines

  1. ECHO OFF
  2. CLS
  3. DATE
  4. CLS
  5. ISAM
  6. RUNCOB MARK01
  7. CLS
  8. IF ERRORLEVEL 002 GOTO DRIVEB
  9. IF ERRORLEVEL 001 GOTO DRIVEA
  10. IF ERRORLEVEL 000 GOTO END
  11. :DRIVEA
  12. ECHO ON
  13. PAUSE  Place BACKUP DISKETTE in Drive A
  14. COPY *.FIL A:
  15. COPY *.KEY A:
  16. PAUSE  Remove BACKUP DISKETTE from Drive A
  17. ECHO OFF
  18. GOTO END
  19. :DRIVEB
  20. ECHO ON
  21. PAUSE  Place BACKUP DISKETTE in Drive B
  22. COPY *.FIL B:
  23. COPY *.KEY B:
  24. PAUSE  Remove BACKUP DISKETTE from Drive B
  25. ECHO OFF
  26. GOTO END
  27. ECHO OFF
  28. :END
  29. ISAM /F
  30. CD\
  31. ECHO ON
  32.